// export SoldLevel , EngLevel , MechLevel , SciLevel ; starting begin ; PrepareHero ;
   0: CALL 586 0 0
// InGameOn ;
   4: CALL_OW 8
// CenterNowOnUnits ( OWChyba ) ;
   8: LD_EXP 5
  12: PPUSH
  13: CALL_OW 87
// SayRadio ( OWChyba , a1 ) ;
  17: LD_EXP 5
  21: PPUSH
  22: LD_STRING a1
  24: PPUSH
  25: CALL_OW 94
// SayRadio ( OWChyba , a2 ) ;
  29: LD_EXP 5
  33: PPUSH
  34: LD_STRING a2
  36: PPUSH
  37: CALL_OW 94
// Say ( Nefarem , a3 ) ;
  41: LD_EXP 6
  45: PPUSH
  46: LD_STRING a3
  48: PPUSH
  49: CALL_OW 88
// Say ( a2 , a4 ) ;
  53: LD_INT 242
  55: PPUSH
  56: LD_STRING a4
  58: PPUSH
  59: CALL_OW 88
// Say ( Nefarem , a5 ) ;
  63: LD_EXP 6
  67: PPUSH
  68: LD_STRING a5
  70: PPUSH
  71: CALL_OW 88
// Say ( OWChyba , a6 ) ;
  75: LD_EXP 5
  79: PPUSH
  80: LD_STRING a6
  82: PPUSH
  83: CALL_OW 88
// Say ( a3 , a7 ) ;
  87: LD_INT 241
  89: PPUSH
  90: LD_STRING a7
  92: PPUSH
  93: CALL_OW 88
// Say ( OWChyba , a8 ) ;
  97: LD_EXP 5
 101: PPUSH
 102: LD_STRING a8
 104: PPUSH
 105: CALL_OW 88
// InGameOff ;
 109: CALL_OW 9
// ChangeMissionObjectives ( M1 ) ;
 113: LD_STRING M1
 115: PPUSH
 116: CALL_OW 337
// SaveForQuickRestart ;
 120: CALL_OW 22
// wait ( 0 0$10 ) ;
 124: LD_INT 350
 126: PPUSH
 127: CALL_OW 67
// atak_poludnie ;
 131: CALL 682 0 0
// wait ( 0 0$50 ) ;
 135: LD_INT 1750
 137: PPUSH
 138: CALL_OW 67
// atak_polnoc ;
 142: CALL 1200 0 0
// wait ( 0 0$50 ) ;
 146: LD_INT 1750
 148: PPUSH
 149: CALL_OW 67
// atak_zachod ;
 153: CALL 1538 0 0
// wait ( 0 0$50 ) ;
 157: LD_INT 1750
 159: PPUSH
 160: CALL_OW 67
// atak_poludnie ;
 164: CALL 682 0 0
// atak_zachod ;
 168: CALL 1538 0 0
// wait ( 0 0$40 ) ;
 172: LD_INT 1400
 174: PPUSH
 175: CALL_OW 67
// wait ( 0 0$40 ) ;
 179: LD_INT 1400
 181: PPUSH
 182: CALL_OW 67
// atak_zachod ;
 186: CALL 1538 0 0
// atak_zachod ;
 190: CALL 1538 0 0
// atak_poludnie ;
 194: CALL 682 0 0
// atak_poludnie ;
 198: CALL 682 0 0
// atak_polnoc ;
 202: CALL 1200 0 0
// wait ( 0 0$13 ) ;
 206: LD_INT 455
 208: PPUSH
 209: CALL_OW 67
// InGameOn ;
 213: CALL_OW 8
// USA ;
 217: CALL 1907 0 0
// CenterNowOnUnits ( g1 ) ;
 221: LD_EXP 28
 225: PPUSH
 226: CALL_OW 87
// wait ( 0 0$02 ) ;
 230: LD_INT 70
 232: PPUSH
 233: CALL_OW 67
// Say ( OWChyba , d9 ) ;
 237: LD_EXP 5
 241: PPUSH
 242: LD_STRING d9
 244: PPUSH
 245: CALL_OW 88
// Say ( a2 , d10 ) ;
 249: LD_INT 242
 251: PPUSH
 252: LD_STRING d10
 254: PPUSH
 255: CALL_OW 88
// wait ( 0 0$05 ) ;
 259: LD_INT 175
 261: PPUSH
 262: CALL_OW 67
// PULK_1 ;
 266: CALL 2544 0 0
// WP_PULK ;
 270: CALL 2678 0 0
// wait ( 0 0$08 ) ;
 274: LD_INT 280
 276: PPUSH
 277: CALL_OW 67
// CenterNowOnUnits ( PULK_01 ) ;
 281: LD_EXP 43
 285: PPUSH
 286: CALL_OW 87
// AddComMoveUnit ( OWChyba , PULK_01 ) ;
 290: LD_EXP 5
 294: PPUSH
 295: LD_EXP 43
 299: PPUSH
 300: CALL_OW 172
// AddComTurnUnit ( OWChyba , PULK_01 ) ;
 304: LD_EXP 5
 308: PPUSH
 309: LD_EXP 43
 313: PPUSH
 314: CALL_OW 179
// AddComTurnUnit ( Pulk_01 , OWChyba ) ;
 318: LD_EXP 43
 322: PPUSH
 323: LD_EXP 5
 327: PPUSH
 328: CALL_OW 179
// Center = 1 ;
 332: LD_ADDR_EXP 48
 336: PUSH
 337: LD_INT 1
 339: ST_TO_ADDR
// Say ( OWChyba , a11 ) ;
 340: LD_EXP 5
 344: PPUSH
 345: LD_STRING a11
 347: PPUSH
 348: CALL_OW 88
// Say ( PULK_01 , a12 ) ;
 352: LD_EXP 43
 356: PPUSH
 357: LD_STRING a12
 359: PPUSH
 360: CALL_OW 88
// Say ( OWChyba , a13 ) ;
 364: LD_EXP 5
 368: PPUSH
 369: LD_STRING a13
 371: PPUSH
 372: CALL_OW 88
// Say ( PULK_01 , a14 ) ;
 376: LD_EXP 43
 380: PPUSH
 381: LD_STRING a14
 383: PPUSH
 384: CALL_OW 88
// Say ( OWChyba , a15 ) ;
 388: LD_EXP 5
 392: PPUSH
 393: LD_STRING a15
 395: PPUSH
 396: CALL_OW 88
// Say ( PULK_01 , a16 ) ;
 400: LD_EXP 43
 404: PPUSH
 405: LD_STRING a16
 407: PPUSH
 408: CALL_OW 88
// Say ( OWChyba , a17 ) ;
 412: LD_EXP 5
 416: PPUSH
 417: LD_STRING a17
 419: PPUSH
 420: CALL_OW 88
// Say ( PULK_01 , a18 ) ;
 424: LD_EXP 43
 428: PPUSH
 429: LD_STRING a18
 431: PPUSH
 432: CALL_OW 88
// Say ( PULK_01 , a19 ) ;
 436: LD_EXP 43
 440: PPUSH
 441: LD_STRING a19
 443: PPUSH
 444: CALL_OW 88
// Say ( OWChyba , a20 ) ;
 448: LD_EXP 5
 452: PPUSH
 453: LD_STRING a20
 455: PPUSH
 456: CALL_OW 88
// Say ( PULK_01 , a21 ) ;
 460: LD_EXP 43
 464: PPUSH
 465: LD_STRING a21
 467: PPUSH
 468: CALL_OW 88
// ComExitVehicle ( c1 ) ;
 472: LD_EXP 41
 476: PPUSH
 477: CALL_OW 121
// AddComEnterUnit ( OWChyba , f1 ) ;
 481: LD_EXP 5
 485: PPUSH
 486: LD_EXP 39
 490: PPUSH
 491: CALL_OW 180
// AddComMoveToArea ( OWChyba , WYJAZD ) ;
 495: LD_EXP 5
 499: PPUSH
 500: LD_INT 13
 502: PPUSH
 503: CALL_OW 173
// end ;
 507: END
// every 0 0$1 trigger IsInArea ( f1 , WYJAZD ) or IsInArea ( OWCHYBA , WYJAZD ) do
 508: LD_EXP 39
 512: PPUSH
 513: LD_INT 13
 515: PPUSH
 516: CALL_OW 308
 520: PUSH
 521: LD_EXP 5
 525: PPUSH
 526: LD_INT 13
 528: PPUSH
 529: CALL_OW 308
 533: OR
 534: IFFALSE 585
 536: GO 538
 538: DISABLE
// begin SaveCharacters ( OWChyba , OWChyba ) ;
 539: LD_EXP 5
 543: PPUSH
 544: LD_STRING OWChyba
 546: PPUSH
 547: CALL_OW 38
// SaveCharacters ( PULK_01 , PULK_01 ) ;
 551: LD_EXP 43
 555: PPUSH
 556: LD_STRING PULK_01
 558: PPUSH
 559: CALL_OW 38
// SaveCharacters ( Nefarem , Nefarem ) ;
 563: LD_EXP 6
 567: PPUSH
 568: LD_STRING Nefarem
 570: PPUSH
 571: CALL_OW 38
// ChangeMap ( 2 , %_cont ) ;
 575: LD_INT 2
 577: PPUSH
 578: LD_STRING %_cont
 580: PPUSH
 581: CALL_OW 340
// end ; end_of_file
 585: END
// export OWChyba , Nefarem ; export function PrepareHero ; begin
 586: LD_INT 0
 588: PPUSH
// uc_side = 4 ;
 589: LD_ADDR_OWVAR 20
 593: PUSH
 594: LD_INT 4
 596: ST_TO_ADDR
// uc_nation = 1 ;
 597: LD_ADDR_OWVAR 21
 601: PUSH
 602: LD_INT 1
 604: ST_TO_ADDR
// OWCHyba := CreateCharacter ( OWChyba ) ;
 605: LD_ADDR_EXP 5
 609: PUSH
 610: LD_STRING OWChyba
 612: PPUSH
 613: CALL_OW 34
 617: ST_TO_ADDR
// PlaceUnitArea ( OWChyba , RESPAWN , false ) ;
 618: LD_EXP 5
 622: PPUSH
 623: LD_INT 7
 625: PPUSH
 626: LD_INT 0
 628: PPUSH
 629: CALL_OW 49
// uc_side = 4 ;
 633: LD_ADDR_OWVAR 20
 637: PUSH
 638: LD_INT 4
 640: ST_TO_ADDR
// uc_nation = 1 ;
 641: LD_ADDR_OWVAR 21
 645: PUSH
 646: LD_INT 1
 648: ST_TO_ADDR
// Nefarem := CreateCharacter ( Nefarem ) ;
 649: LD_ADDR_EXP 6
 653: PUSH
 654: LD_STRING Nefarem
 656: PPUSH
 657: CALL_OW 34
 661: ST_TO_ADDR
// PlaceUnitArea ( Nefarem , RESPAWN , false ) ;
 662: LD_EXP 6
 666: PPUSH
 667: LD_INT 7
 669: PPUSH
 670: LD_INT 0
 672: PPUSH
 673: CALL_OW 49
// end ; end_of_file
 677: LD_VAR 0 1
 681: RET
// export w1 , w2 , w3 , w4 , w5 , w6 , w7 , w8 , w9 , w0 ; export function atak_poludnie ; begin
 682: LD_INT 0
 684: PPUSH
// ; SoldLevel = [ 1 , 2 , 3 ] [ Difficulty ] ;
 685: LD_ADDR_EXP 1
 689: PUSH
 690: LD_INT 1
 692: PUSH
 693: LD_INT 2
 695: PUSH
 696: LD_INT 3
 698: PUSH
 699: EMPTY
 700: LIST
 701: LIST
 702: LIST
 703: PUSH
 704: LD_OWVAR 67
 708: ARRAY
 709: ST_TO_ADDR
// EngLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
 710: LD_ADDR_EXP 2
 714: PUSH
 715: LD_INT 0
 717: PUSH
 718: LD_INT 1
 720: PUSH
 721: LD_INT 2
 723: PUSH
 724: EMPTY
 725: LIST
 726: LIST
 727: LIST
 728: PUSH
 729: LD_OWVAR 67
 733: ARRAY
 734: ST_TO_ADDR
// MechLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
 735: LD_ADDR_EXP 3
 739: PUSH
 740: LD_INT 0
 742: PUSH
 743: LD_INT 1
 745: PUSH
 746: LD_INT 2
 748: PUSH
 749: EMPTY
 750: LIST
 751: LIST
 752: LIST
 753: PUSH
 754: LD_OWVAR 67
 758: ARRAY
 759: ST_TO_ADDR
// SciLevel = [ 0 , 0 , 2 ] [ Difficulty ] ;
 760: LD_ADDR_EXP 4
 764: PUSH
 765: LD_INT 0
 767: PUSH
 768: LD_INT 0
 770: PUSH
 771: LD_INT 2
 773: PUSH
 774: EMPTY
 775: LIST
 776: LIST
 777: LIST
 778: PUSH
 779: LD_OWVAR 67
 783: ARRAY
 784: ST_TO_ADDR
// hc_name =  ;
 785: LD_ADDR_OWVAR 26
 789: PUSH
 790: LD_STRING 
 792: ST_TO_ADDR
// uc_nation = nation_russian ;
 793: LD_ADDR_OWVAR 21
 797: PUSH
 798: LD_INT 3
 800: ST_TO_ADDR
// hc_class = 1 ;
 801: LD_ADDR_OWVAR 28
 805: PUSH
 806: LD_INT 1
 808: ST_TO_ADDR
// uc_side = 3 ;
 809: LD_ADDR_OWVAR 20
 813: PUSH
 814: LD_INT 3
 816: ST_TO_ADDR
// hc_gallery =  ;
 817: LD_ADDR_OWVAR 33
 821: PUSH
 822: LD_STRING 
 824: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
 825: LD_ADDR_OWVAR 29
 829: PUSH
 830: LD_INT 10
 832: PUSH
 833: LD_INT 10
 835: PUSH
 836: EMPTY
 837: LIST
 838: LIST
 839: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
 840: LD_ADDR_OWVAR 31
 844: PUSH
 845: LD_EXP 1
 849: PUSH
 850: LD_EXP 2
 854: PUSH
 855: LD_EXP 3
 859: PUSH
 860: LD_EXP 4
 864: PUSH
 865: EMPTY
 866: LIST
 867: LIST
 868: LIST
 869: LIST
 870: ST_TO_ADDR
// hc_importance = 10 ;
 871: LD_ADDR_OWVAR 32
 875: PUSH
 876: LD_INT 10
 878: ST_TO_ADDR
// w1 = CreateHuman ;
 879: LD_ADDR_EXP 7
 883: PUSH
 884: CALL_OW 44
 888: ST_TO_ADDR
// w2 = CreateHuman ;
 889: LD_ADDR_EXP 8
 893: PUSH
 894: CALL_OW 44
 898: ST_TO_ADDR
// w3 = CreateHuman ;
 899: LD_ADDR_EXP 9
 903: PUSH
 904: CALL_OW 44
 908: ST_TO_ADDR
// w4 = CreateHuman ;
 909: LD_ADDR_EXP 10
 913: PUSH
 914: CALL_OW 44
 918: ST_TO_ADDR
// w5 = CreateHuman ;
 919: LD_ADDR_EXP 11
 923: PUSH
 924: CALL_OW 44
 928: ST_TO_ADDR
// w6 = CreateHuman ;
 929: LD_ADDR_EXP 12
 933: PUSH
 934: CALL_OW 44
 938: ST_TO_ADDR
// w7 = CreateHuman ;
 939: LD_ADDR_EXP 13
 943: PUSH
 944: CALL_OW 44
 948: ST_TO_ADDR
// w8 = CreateHuman ;
 949: LD_ADDR_EXP 14
 953: PUSH
 954: CALL_OW 44
 958: ST_TO_ADDR
// w9 = CreateHuman ;
 959: LD_ADDR_EXP 15
 963: PUSH
 964: CALL_OW 44
 968: ST_TO_ADDR
// w0 = CreateHuman ;
 969: LD_ADDR_EXP 16
 973: PUSH
 974: CALL_OW 44
 978: ST_TO_ADDR
// PlaceUnitArea ( w1 , poludnie , false ) ;
 979: LD_EXP 7
 983: PPUSH
 984: LD_INT 10
 986: PPUSH
 987: LD_INT 0
 989: PPUSH
 990: CALL_OW 49
// PlaceUnitArea ( w2 , poludnie , false ) ;
 994: LD_EXP 8
 998: PPUSH
 999: LD_INT 10
1001: PPUSH
1002: LD_INT 0
1004: PPUSH
1005: CALL_OW 49
// PlaceUnitArea ( w3 , poludnie , false ) ;
1009: LD_EXP 9
1013: PPUSH
1014: LD_INT 10
1016: PPUSH
1017: LD_INT 0
1019: PPUSH
1020: CALL_OW 49
// PlaceUnitArea ( w4 , poludnie , false ) ;
1024: LD_EXP 10
1028: PPUSH
1029: LD_INT 10
1031: PPUSH
1032: LD_INT 0
1034: PPUSH
1035: CALL_OW 49
// PlaceUnitArea ( w5 , poludnie , false ) ;
1039: LD_EXP 11
1043: PPUSH
1044: LD_INT 10
1046: PPUSH
1047: LD_INT 0
1049: PPUSH
1050: CALL_OW 49
// PlaceUnitArea ( w7 , poludnie , false ) ;
1054: LD_EXP 13
1058: PPUSH
1059: LD_INT 10
1061: PPUSH
1062: LD_INT 0
1064: PPUSH
1065: CALL_OW 49
// PlaceUnitArea ( w6 , poludnie , false ) ;
1069: LD_EXP 12
1073: PPUSH
1074: LD_INT 10
1076: PPUSH
1077: LD_INT 0
1079: PPUSH
1080: CALL_OW 49
// PlaceUnitArea ( w8 , poludnie , false ) ;
1084: LD_EXP 14
1088: PPUSH
1089: LD_INT 10
1091: PPUSH
1092: LD_INT 0
1094: PPUSH
1095: CALL_OW 49
// PlaceUnitArea ( w9 , poludnie , false ) ;
1099: LD_EXP 15
1103: PPUSH
1104: LD_INT 10
1106: PPUSH
1107: LD_INT 0
1109: PPUSH
1110: CALL_OW 49
// PlaceUnitArea ( w0 , poludnie , false ) ;
1114: LD_EXP 16
1118: PPUSH
1119: LD_INT 10
1121: PPUSH
1122: LD_INT 0
1124: PPUSH
1125: CALL_OW 49
// AddComAgressiveMove ( [ w1 , w2 , w3 , w4 , w5 , w6 , w7 , w8 , w9 ] , 78 , 47 ) ;
1129: LD_EXP 7
1133: PUSH
1134: LD_EXP 8
1138: PUSH
1139: LD_EXP 9
1143: PUSH
1144: LD_EXP 10
1148: PUSH
1149: LD_EXP 11
1153: PUSH
1154: LD_EXP 12
1158: PUSH
1159: LD_EXP 13
1163: PUSH
1164: LD_EXP 14
1168: PUSH
1169: LD_EXP 15
1173: PUSH
1174: EMPTY
1175: LIST
1176: LIST
1177: LIST
1178: LIST
1179: LIST
1180: LIST
1181: LIST
1182: LIST
1183: LIST
1184: PPUSH
1185: LD_INT 78
1187: PPUSH
1188: LD_INT 47
1190: PPUSH
1191: CALL_OW 174
// end ; end_of_file
1195: LD_VAR 0 1
1199: RET
// export p1 , p2 , p3 , p4 , p5 , p6 ; export function atak_polnoc ; begin
1200: LD_INT 0
1202: PPUSH
// ; SoldLevel = [ 1 , 1 , 2 ] [ Difficulty ] ;
1203: LD_ADDR_EXP 1
1207: PUSH
1208: LD_INT 1
1210: PUSH
1211: LD_INT 1
1213: PUSH
1214: LD_INT 2
1216: PUSH
1217: EMPTY
1218: LIST
1219: LIST
1220: LIST
1221: PUSH
1222: LD_OWVAR 67
1226: ARRAY
1227: ST_TO_ADDR
// EngLevel = [ 0 , 0 , 1 ] [ Difficulty ] ;
1228: LD_ADDR_EXP 2
1232: PUSH
1233: LD_INT 0
1235: PUSH
1236: LD_INT 0
1238: PUSH
1239: LD_INT 1
1241: PUSH
1242: EMPTY
1243: LIST
1244: LIST
1245: LIST
1246: PUSH
1247: LD_OWVAR 67
1251: ARRAY
1252: ST_TO_ADDR
// MechLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
1253: LD_ADDR_EXP 3
1257: PUSH
1258: LD_INT 0
1260: PUSH
1261: LD_INT 1
1263: PUSH
1264: LD_INT 2
1266: PUSH
1267: EMPTY
1268: LIST
1269: LIST
1270: LIST
1271: PUSH
1272: LD_OWVAR 67
1276: ARRAY
1277: ST_TO_ADDR
// SciLevel = [ 0 , 0 , 0 ] [ Difficulty ] ;
1278: LD_ADDR_EXP 4
1282: PUSH
1283: LD_INT 0
1285: PUSH
1286: LD_INT 0
1288: PUSH
1289: LD_INT 0
1291: PUSH
1292: EMPTY
1293: LIST
1294: LIST
1295: LIST
1296: PUSH
1297: LD_OWVAR 67
1301: ARRAY
1302: ST_TO_ADDR
// hc_name =  ;
1303: LD_ADDR_OWVAR 26
1307: PUSH
1308: LD_STRING 
1310: ST_TO_ADDR
// uc_nation = nation_russian ;
1311: LD_ADDR_OWVAR 21
1315: PUSH
1316: LD_INT 3
1318: ST_TO_ADDR
// hc_class = 1 ;
1319: LD_ADDR_OWVAR 28
1323: PUSH
1324: LD_INT 1
1326: ST_TO_ADDR
// uc_side = 3 ;
1327: LD_ADDR_OWVAR 20
1331: PUSH
1332: LD_INT 3
1334: ST_TO_ADDR
// hc_gallery =  ;
1335: LD_ADDR_OWVAR 33
1339: PUSH
1340: LD_STRING 
1342: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
1343: LD_ADDR_OWVAR 29
1347: PUSH
1348: LD_INT 10
1350: PUSH
1351: LD_INT 10
1353: PUSH
1354: EMPTY
1355: LIST
1356: LIST
1357: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
1358: LD_ADDR_OWVAR 31
1362: PUSH
1363: LD_EXP 1
1367: PUSH
1368: LD_EXP 2
1372: PUSH
1373: LD_EXP 3
1377: PUSH
1378: LD_EXP 4
1382: PUSH
1383: EMPTY
1384: LIST
1385: LIST
1386: LIST
1387: LIST
1388: ST_TO_ADDR
// hc_importance = 10 ;
1389: LD_ADDR_OWVAR 32
1393: PUSH
1394: LD_INT 10
1396: ST_TO_ADDR
// p1 = CreateHuman ;
1397: LD_ADDR_EXP 17
1401: PUSH
1402: CALL_OW 44
1406: ST_TO_ADDR
// p2 = CreateHuman ;
1407: LD_ADDR_EXP 18
1411: PUSH
1412: CALL_OW 44
1416: ST_TO_ADDR
// p3 = CreateHuman ;
1417: LD_ADDR_EXP 19
1421: PUSH
1422: CALL_OW 44
1426: ST_TO_ADDR
// p4 = CreateHuman ;
1427: LD_ADDR_EXP 20
1431: PUSH
1432: CALL_OW 44
1436: ST_TO_ADDR
// PlaceUnitArea ( p1 , polnoc , false ) ;
1437: LD_EXP 17
1441: PPUSH
1442: LD_INT 9
1444: PPUSH
1445: LD_INT 0
1447: PPUSH
1448: CALL_OW 49
// PlaceUnitArea ( p2 , polnoc , false ) ;
1452: LD_EXP 18
1456: PPUSH
1457: LD_INT 9
1459: PPUSH
1460: LD_INT 0
1462: PPUSH
1463: CALL_OW 49
// PlaceUnitArea ( p3 , polnoc , false ) ;
1467: LD_EXP 19
1471: PPUSH
1472: LD_INT 9
1474: PPUSH
1475: LD_INT 0
1477: PPUSH
1478: CALL_OW 49
// PlaceUnitArea ( p4 , polnoc , false ) ;
1482: LD_EXP 20
1486: PPUSH
1487: LD_INT 9
1489: PPUSH
1490: LD_INT 0
1492: PPUSH
1493: CALL_OW 49
// AddComAgressiveMove ( [ p1 , p2 , p3 , p4 ] , 73 , 33 ) ;
1497: LD_EXP 17
1501: PUSH
1502: LD_EXP 18
1506: PUSH
1507: LD_EXP 19
1511: PUSH
1512: LD_EXP 20
1516: PUSH
1517: EMPTY
1518: LIST
1519: LIST
1520: LIST
1521: LIST
1522: PPUSH
1523: LD_INT 73
1525: PPUSH
1526: LD_INT 33
1528: PPUSH
1529: CALL_OW 174
// end ; end_of_file
1533: LD_VAR 0 1
1537: RET
// export b1 , b2 , b3 , b4 , b5 ; export function atak_zachod ; begin
1538: LD_INT 0
1540: PPUSH
// ; SoldLevel = [ 1 , 2 , 2 ] [ Difficulty ] ;
1541: LD_ADDR_EXP 1
1545: PUSH
1546: LD_INT 1
1548: PUSH
1549: LD_INT 2
1551: PUSH
1552: LD_INT 2
1554: PUSH
1555: EMPTY
1556: LIST
1557: LIST
1558: LIST
1559: PUSH
1560: LD_OWVAR 67
1564: ARRAY
1565: ST_TO_ADDR
// EngLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
1566: LD_ADDR_EXP 2
1570: PUSH
1571: LD_INT 0
1573: PUSH
1574: LD_INT 1
1576: PUSH
1577: LD_INT 2
1579: PUSH
1580: EMPTY
1581: LIST
1582: LIST
1583: LIST
1584: PUSH
1585: LD_OWVAR 67
1589: ARRAY
1590: ST_TO_ADDR
// MechLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
1591: LD_ADDR_EXP 3
1595: PUSH
1596: LD_INT 0
1598: PUSH
1599: LD_INT 1
1601: PUSH
1602: LD_INT 2
1604: PUSH
1605: EMPTY
1606: LIST
1607: LIST
1608: LIST
1609: PUSH
1610: LD_OWVAR 67
1614: ARRAY
1615: ST_TO_ADDR
// SciLevel = [ 0 , 1 , 2 ] [ Difficulty ] ;
1616: LD_ADDR_EXP 4
1620: PUSH
1621: LD_INT 0
1623: PUSH
1624: LD_INT 1
1626: PUSH
1627: LD_INT 2
1629: PUSH
1630: EMPTY
1631: LIST
1632: LIST
1633: LIST
1634: PUSH
1635: LD_OWVAR 67
1639: ARRAY
1640: ST_TO_ADDR
// hc_name =  ;
1641: LD_ADDR_OWVAR 26
1645: PUSH
1646: LD_STRING 
1648: ST_TO_ADDR
// uc_nation = nation_russian ;
1649: LD_ADDR_OWVAR 21
1653: PUSH
1654: LD_INT 3
1656: ST_TO_ADDR
// hc_class = 1 ;
1657: LD_ADDR_OWVAR 28
1661: PUSH
1662: LD_INT 1
1664: ST_TO_ADDR
// uc_side = 3 ;
1665: LD_ADDR_OWVAR 20
1669: PUSH
1670: LD_INT 3
1672: ST_TO_ADDR
// hc_gallery =  ;
1673: LD_ADDR_OWVAR 33
1677: PUSH
1678: LD_STRING 
1680: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
1681: LD_ADDR_OWVAR 29
1685: PUSH
1686: LD_INT 10
1688: PUSH
1689: LD_INT 10
1691: PUSH
1692: EMPTY
1693: LIST
1694: LIST
1695: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
1696: LD_ADDR_OWVAR 31
1700: PUSH
1701: LD_EXP 1
1705: PUSH
1706: LD_EXP 2
1710: PUSH
1711: LD_EXP 3
1715: PUSH
1716: LD_EXP 4
1720: PUSH
1721: EMPTY
1722: LIST
1723: LIST
1724: LIST
1725: LIST
1726: ST_TO_ADDR
// hc_importance = 10 ;
1727: LD_ADDR_OWVAR 32
1731: PUSH
1732: LD_INT 10
1734: ST_TO_ADDR
// b1 = CreateHuman ;
1735: LD_ADDR_EXP 23
1739: PUSH
1740: CALL_OW 44
1744: ST_TO_ADDR
// b2 = CreateHuman ;
1745: LD_ADDR_EXP 24
1749: PUSH
1750: CALL_OW 44
1754: ST_TO_ADDR
// b3 = CreateHuman ;
1755: LD_ADDR_EXP 25
1759: PUSH
1760: CALL_OW 44
1764: ST_TO_ADDR
// b4 = CreateHuman ;
1765: LD_ADDR_EXP 26
1769: PUSH
1770: CALL_OW 44
1774: ST_TO_ADDR
// b5 = CreateHuman ;
1775: LD_ADDR_EXP 27
1779: PUSH
1780: CALL_OW 44
1784: ST_TO_ADDR
// PlaceUnitArea ( b1 , ZACHOD , false ) ;
1785: LD_EXP 23
1789: PPUSH
1790: LD_INT 8
1792: PPUSH
1793: LD_INT 0
1795: PPUSH
1796: CALL_OW 49
// PlaceUnitArea ( b2 , ZACHOD , false ) ;
1800: LD_EXP 24
1804: PPUSH
1805: LD_INT 8
1807: PPUSH
1808: LD_INT 0
1810: PPUSH
1811: CALL_OW 49
// PlaceUnitArea ( b3 , ZACHOD , false ) ;
1815: LD_EXP 25
1819: PPUSH
1820: LD_INT 8
1822: PPUSH
1823: LD_INT 0
1825: PPUSH
1826: CALL_OW 49
// PlaceUnitArea ( b4 , ZACHOD , false ) ;
1830: LD_EXP 26
1834: PPUSH
1835: LD_INT 8
1837: PPUSH
1838: LD_INT 0
1840: PPUSH
1841: CALL_OW 49
// PlaceUnitArea ( b5 , ZACHOD , false ) ;
1845: LD_EXP 27
1849: PPUSH
1850: LD_INT 8
1852: PPUSH
1853: LD_INT 0
1855: PPUSH
1856: CALL_OW 49
// AddComAgressiveMove ( [ b1 , b2 , b3 , b4 , b5 ] , 73 , 33 ) ;
1860: LD_EXP 23
1864: PUSH
1865: LD_EXP 24
1869: PUSH
1870: LD_EXP 25
1874: PUSH
1875: LD_EXP 26
1879: PUSH
1880: LD_EXP 27
1884: PUSH
1885: EMPTY
1886: LIST
1887: LIST
1888: LIST
1889: LIST
1890: LIST
1891: PPUSH
1892: LD_INT 73
1894: PPUSH
1895: LD_INT 33
1897: PPUSH
1898: CALL_OW 174
// end ; end_of_file
1902: LD_VAR 0 1
1906: RET
// export g1 , g3 , g2 , g4 , g6 , g5 , g7 , g8 , g9 , g10 , g11 , f1 , f2 , c1 , c2 ; export function USA ; begin
1907: LD_INT 0
1909: PPUSH
// ; hc_name =  ;
1910: LD_ADDR_OWVAR 26
1914: PUSH
1915: LD_STRING 
1917: ST_TO_ADDR
// uc_nation = 1 ;
1918: LD_ADDR_OWVAR 21
1922: PUSH
1923: LD_INT 1
1925: ST_TO_ADDR
// hc_class = 1 ;
1926: LD_ADDR_OWVAR 28
1930: PUSH
1931: LD_INT 1
1933: ST_TO_ADDR
// uc_side = 1 ;
1934: LD_ADDR_OWVAR 20
1938: PUSH
1939: LD_INT 1
1941: ST_TO_ADDR
// hc_gallery =  ;
1942: LD_ADDR_OWVAR 33
1946: PUSH
1947: LD_STRING 
1949: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
1950: LD_ADDR_OWVAR 29
1954: PUSH
1955: LD_INT 10
1957: PUSH
1958: LD_INT 10
1960: PUSH
1961: EMPTY
1962: LIST
1963: LIST
1964: ST_TO_ADDR
// hc_basic_skills = [ Rand ( 1 , 4 ) , 0 , 0 , 0 ] ;
1965: LD_ADDR_OWVAR 30
1969: PUSH
1970: LD_INT 1
1972: PPUSH
1973: LD_INT 4
1975: PPUSH
1976: CALL_OW 12
1980: PUSH
1981: LD_INT 0
1983: PUSH
1984: LD_INT 0
1986: PUSH
1987: LD_INT 0
1989: PUSH
1990: EMPTY
1991: LIST
1992: LIST
1993: LIST
1994: LIST
1995: ST_TO_ADDR
// hc_importance = 10 ;
1996: LD_ADDR_OWVAR 32
2000: PUSH
2001: LD_INT 10
2003: ST_TO_ADDR
// g1 = CreateHuman ;
2004: LD_ADDR_EXP 28
2008: PUSH
2009: CALL_OW 44
2013: ST_TO_ADDR
// g2 = CreateHuman ;
2014: LD_ADDR_EXP 30
2018: PUSH
2019: CALL_OW 44
2023: ST_TO_ADDR
// g3 = CreateHuman ;
2024: LD_ADDR_EXP 29
2028: PUSH
2029: CALL_OW 44
2033: ST_TO_ADDR
// g4 = CreateHuman ;
2034: LD_ADDR_EXP 31
2038: PUSH
2039: CALL_OW 44
2043: ST_TO_ADDR
// g5 = CreateHuman ;
2044: LD_ADDR_EXP 33
2048: PUSH
2049: CALL_OW 44
2053: ST_TO_ADDR
// g6 = CreateHuman ;
2054: LD_ADDR_EXP 32
2058: PUSH
2059: CALL_OW 44
2063: ST_TO_ADDR
// g7 = CreateHuman ;
2064: LD_ADDR_EXP 34
2068: PUSH
2069: CALL_OW 44
2073: ST_TO_ADDR
// g8 = CreateHuman ;
2074: LD_ADDR_EXP 35
2078: PUSH
2079: CALL_OW 44
2083: ST_TO_ADDR
// g8 = CreateHuman ;
2084: LD_ADDR_EXP 35
2088: PUSH
2089: CALL_OW 44
2093: ST_TO_ADDR
// g10 = CreateHuman ;
2094: LD_ADDR_EXP 37
2098: PUSH
2099: CALL_OW 44
2103: ST_TO_ADDR
// g11 = CreateHuman ;
2104: LD_ADDR_EXP 38
2108: PUSH
2109: CALL_OW 44
2113: ST_TO_ADDR
// PlaceUnitArea ( g1 , POMOC1 , false ) ;
2114: LD_EXP 28
2118: PPUSH
2119: LD_INT 11
2121: PPUSH
2122: LD_INT 0
2124: PPUSH
2125: CALL_OW 49
// PlaceUnitArea ( g2 , POMOC1 , false ) ;
2129: LD_EXP 30
2133: PPUSH
2134: LD_INT 11
2136: PPUSH
2137: LD_INT 0
2139: PPUSH
2140: CALL_OW 49
// PlaceUnitArea ( g3 , POMOC1 , false ) ;
2144: LD_EXP 29
2148: PPUSH
2149: LD_INT 11
2151: PPUSH
2152: LD_INT 0
2154: PPUSH
2155: CALL_OW 49
// PlaceUnitArea ( g4 , POMOC1 , false ) ;
2159: LD_EXP 31
2163: PPUSH
2164: LD_INT 11
2166: PPUSH
2167: LD_INT 0
2169: PPUSH
2170: CALL_OW 49
// PlaceUnitArea ( g5 , POMOC1 , false ) ;
2174: LD_EXP 33
2178: PPUSH
2179: LD_INT 11
2181: PPUSH
2182: LD_INT 0
2184: PPUSH
2185: CALL_OW 49
// PlaceUnitArea ( g7 , POMOC1 , false ) ;
2189: LD_EXP 34
2193: PPUSH
2194: LD_INT 11
2196: PPUSH
2197: LD_INT 0
2199: PPUSH
2200: CALL_OW 49
// PlaceUnitArea ( g8 , POMOC1 , false ) ;
2204: LD_EXP 35
2208: PPUSH
2209: LD_INT 11
2211: PPUSH
2212: LD_INT 0
2214: PPUSH
2215: CALL_OW 49
// PlaceUnitArea ( g9 , POMOC1 , false ) ;
2219: LD_EXP 36
2223: PPUSH
2224: LD_INT 11
2226: PPUSH
2227: LD_INT 0
2229: PPUSH
2230: CALL_OW 49
// PlaceUnitArea ( g10 , POMOC1 , false ) ;
2234: LD_EXP 37
2238: PPUSH
2239: LD_INT 11
2241: PPUSH
2242: LD_INT 0
2244: PPUSH
2245: CALL_OW 49
// PlaceUnitArea ( g11 , POMOC1 , false ) ;
2249: LD_EXP 38
2253: PPUSH
2254: LD_INT 11
2256: PPUSH
2257: LD_INT 0
2259: PPUSH
2260: CALL_OW 49
// vc_chassis = 3 ;
2264: LD_ADDR_OWVAR 37
2268: PUSH
2269: LD_INT 3
2271: ST_TO_ADDR
// vc_engine = engine_combustion ;
2272: LD_ADDR_OWVAR 39
2276: PUSH
2277: LD_INT 1
2279: ST_TO_ADDR
// vc_control = control_manual ;
2280: LD_ADDR_OWVAR 38
2284: PUSH
2285: LD_INT 1
2287: ST_TO_ADDR
// vc_weapon = 4 ;
2288: LD_ADDR_OWVAR 40
2292: PUSH
2293: LD_INT 4
2295: ST_TO_ADDR
// f1 = CreateVehicle ;
2296: LD_ADDR_EXP 39
2300: PUSH
2301: CALL_OW 45
2305: ST_TO_ADDR
// f2 = CreateVehicle ;
2306: LD_ADDR_EXP 40
2310: PUSH
2311: CALL_OW 45
2315: ST_TO_ADDR
// hc_class = 3 ;
2316: LD_ADDR_OWVAR 28
2320: PUSH
2321: LD_INT 3
2323: ST_TO_ADDR
// hc_name =  ;
2324: LD_ADDR_OWVAR 26
2328: PUSH
2329: LD_STRING 
2331: ST_TO_ADDR
// hc_gallery =  ;
2332: LD_ADDR_OWVAR 33
2336: PUSH
2337: LD_STRING 
2339: ST_TO_ADDR
// hc_sex = sex_male ;
2340: LD_ADDR_OWVAR 27
2344: PUSH
2345: LD_INT 1
2347: ST_TO_ADDR
// hc_skills = [ 1 , 2 , 4 , 0 ] ;
2348: LD_ADDR_OWVAR 31
2352: PUSH
2353: LD_INT 1
2355: PUSH
2356: LD_INT 2
2358: PUSH
2359: LD_INT 4
2361: PUSH
2362: LD_INT 0
2364: PUSH
2365: EMPTY
2366: LIST
2367: LIST
2368: LIST
2369: LIST
2370: ST_TO_ADDR
// c1 = CreateHuman ;
2371: LD_ADDR_EXP 41
2375: PUSH
2376: CALL_OW 44
2380: ST_TO_ADDR
// c2 = CreateHuman ;
2381: LD_ADDR_EXP 42
2385: PUSH
2386: CALL_OW 44
2390: ST_TO_ADDR
// PlaceHumanInUnit ( c1 , f1 ) ;
2391: LD_EXP 41
2395: PPUSH
2396: LD_EXP 39
2400: PPUSH
2401: CALL_OW 52
// PlaceHumanInUnit ( c2 , f2 ) ;
2405: LD_EXP 42
2409: PPUSH
2410: LD_EXP 40
2414: PPUSH
2415: CALL_OW 52
// PlaceUnitArea ( f1 , POMOC1 , false ) ;
2419: LD_EXP 39
2423: PPUSH
2424: LD_INT 11
2426: PPUSH
2427: LD_INT 0
2429: PPUSH
2430: CALL_OW 49
// PlaceUnitArea ( f2 , POMOC1 , false ) ;
2434: LD_EXP 40
2438: PPUSH
2439: LD_INT 11
2441: PPUSH
2442: LD_INT 0
2444: PPUSH
2445: CALL_OW 49
// AddComAgressiveMove ( [ g1 , g2 , g3 , g4 , g5 , g6 , g7 , g8 , g9 , g10 , g11 , c1 , c2 ] , 79 , 49 , ) ;
2449: LD_EXP 28
2453: PUSH
2454: LD_EXP 30
2458: PUSH
2459: LD_EXP 29
2463: PUSH
2464: LD_EXP 31
2468: PUSH
2469: LD_EXP 33
2473: PUSH
2474: LD_EXP 32
2478: PUSH
2479: LD_EXP 34
2483: PUSH
2484: LD_EXP 35
2488: PUSH
2489: LD_EXP 36
2493: PUSH
2494: LD_EXP 37
2498: PUSH
2499: LD_EXP 38
2503: PUSH
2504: LD_EXP 41
2508: PUSH
2509: LD_EXP 42
2513: PUSH
2514: EMPTY
2515: LIST
2516: LIST
2517: LIST
2518: LIST
2519: LIST
2520: LIST
2521: LIST
2522: LIST
2523: LIST
2524: LIST
2525: LIST
2526: LIST
2527: LIST
2528: PPUSH
2529: LD_INT 79
2531: PPUSH
2532: LD_INT 49
2534: PPUSH
2535: CALL_OW 174
// end ; end_of_file
2539: LD_VAR 0 1
2543: RET
// export PULK_01 ; export function PULK_1 ; begin
2544: LD_INT 0
2546: PPUSH
// ; hc_name = Pukownik Jones ;
2547: LD_ADDR_OWVAR 26
2551: PUSH
2552: LD_STRING Pukownik Jones
2554: ST_TO_ADDR
// uc_nation = nation_American ;
2555: LD_ADDR_OWVAR 21
2559: PUSH
2560: LD_INT 1
2562: ST_TO_ADDR
// hc_class = 1 ;
2563: LD_ADDR_OWVAR 28
2567: PUSH
2568: LD_INT 1
2570: ST_TO_ADDR
// uc_side = 1 ;
2571: LD_ADDR_OWVAR 20
2575: PUSH
2576: LD_INT 1
2578: ST_TO_ADDR
// hc_gallery =  ;
2579: LD_ADDR_OWVAR 33
2583: PUSH
2584: LD_STRING 
2586: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
2587: LD_ADDR_OWVAR 29
2591: PUSH
2592: LD_INT 10
2594: PUSH
2595: LD_INT 10
2597: PUSH
2598: EMPTY
2599: LIST
2600: LIST
2601: ST_TO_ADDR
// hc_basic_skills = [ 8 , 4 , 3 , 3 ] ;
2602: LD_ADDR_OWVAR 30
2606: PUSH
2607: LD_INT 8
2609: PUSH
2610: LD_INT 4
2612: PUSH
2613: LD_INT 3
2615: PUSH
2616: LD_INT 3
2618: PUSH
2619: EMPTY
2620: LIST
2621: LIST
2622: LIST
2623: LIST
2624: ST_TO_ADDR
// hc_importance = 100 ;
2625: LD_ADDR_OWVAR 32
2629: PUSH
2630: LD_INT 100
2632: ST_TO_ADDR
// PULK_01 = CreateHuman ;
2633: LD_ADDR_EXP 43
2637: PUSH
2638: CALL_OW 44
2642: ST_TO_ADDR
// PlaceUnitArea ( PULK_01 , PULKOWNIK , false ) ;
2643: LD_EXP 43
2647: PPUSH
2648: LD_INT 12
2650: PPUSH
2651: LD_INT 0
2653: PPUSH
2654: CALL_OW 49
// ComMoveXY ( PULK_01 , 69 , 31 ) ;
2658: LD_EXP 43
2662: PPUSH
2663: LD_INT 69
2665: PPUSH
2666: LD_INT 31
2668: PPUSH
2669: CALL_OW 111
// end ; end_of_file
2673: LD_VAR 0 1
2677: RET
// export WP_01 , WP_02 , WP_03 , WP_04 ; export function WP_PULK ; begin
2678: LD_INT 0
2680: PPUSH
// ; hc_name =  ;
2681: LD_ADDR_OWVAR 26
2685: PUSH
2686: LD_STRING 
2688: ST_TO_ADDR
// uc_nation = nation_American ;
2689: LD_ADDR_OWVAR 21
2693: PUSH
2694: LD_INT 1
2696: ST_TO_ADDR
// hc_class = 1 ;
2697: LD_ADDR_OWVAR 28
2701: PUSH
2702: LD_INT 1
2704: ST_TO_ADDR
// uc_side = 1 ;
2705: LD_ADDR_OWVAR 20
2709: PUSH
2710: LD_INT 1
2712: ST_TO_ADDR
// hc_gallery =  ;
2713: LD_ADDR_OWVAR 33
2717: PUSH
2718: LD_STRING 
2720: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
2721: LD_ADDR_OWVAR 29
2725: PUSH
2726: LD_INT 10
2728: PUSH
2729: LD_INT 10
2731: PUSH
2732: EMPTY
2733: LIST
2734: LIST
2735: ST_TO_ADDR
// hc_basic_skills = [ 5 , 0 , 0 , 0 ] ;
2736: LD_ADDR_OWVAR 30
2740: PUSH
2741: LD_INT 5
2743: PUSH
2744: LD_INT 0
2746: PUSH
2747: LD_INT 0
2749: PUSH
2750: LD_INT 0
2752: PUSH
2753: EMPTY
2754: LIST
2755: LIST
2756: LIST
2757: LIST
2758: ST_TO_ADDR
// hc_importance = 10 ;
2759: LD_ADDR_OWVAR 32
2763: PUSH
2764: LD_INT 10
2766: ST_TO_ADDR
// WP_01 = CreateHuman ;
2767: LD_ADDR_EXP 44
2771: PUSH
2772: CALL_OW 44
2776: ST_TO_ADDR
// WP_02 = CreateHuman ;
2777: LD_ADDR_EXP 45
2781: PUSH
2782: CALL_OW 44
2786: ST_TO_ADDR
// WP_03 = CreateHuman ;
2787: LD_ADDR_EXP 46
2791: PUSH
2792: CALL_OW 44
2796: ST_TO_ADDR
// WP_04 = CreateHuman ;
2797: LD_ADDR_EXP 47
2801: PUSH
2802: CALL_OW 44
2806: ST_TO_ADDR
// PlaceUnitArea ( WP_01 , PULKOWNIK , false ) ;
2807: LD_EXP 44
2811: PPUSH
2812: LD_INT 12
2814: PPUSH
2815: LD_INT 0
2817: PPUSH
2818: CALL_OW 49
// PlaceUnitArea ( WP_02 , PULKOWNIK , false ) ;
2822: LD_EXP 45
2826: PPUSH
2827: LD_INT 12
2829: PPUSH
2830: LD_INT 0
2832: PPUSH
2833: CALL_OW 49
// PlaceUnitArea ( WP_03 , PULKOWNIK , false ) ;
2837: LD_EXP 46
2841: PPUSH
2842: LD_INT 12
2844: PPUSH
2845: LD_INT 0
2847: PPUSH
2848: CALL_OW 49
// PlaceUnitArea ( WP_04 , PULKOWNIK , false ) ;
2852: LD_EXP 47
2856: PPUSH
2857: LD_INT 12
2859: PPUSH
2860: LD_INT 0
2862: PPUSH
2863: CALL_OW 49
// ComMoveXY ( [ WP_01 , WP_02 , WP_03 , WP_04 ] , 73 , 32 ) ;
2867: LD_EXP 44
2871: PUSH
2872: LD_EXP 45
2876: PUSH
2877: LD_EXP 46
2881: PUSH
2882: LD_EXP 47
2886: PUSH
2887: EMPTY
2888: LIST
2889: LIST
2890: LIST
2891: LIST
2892: PPUSH
2893: LD_INT 73
2895: PPUSH
2896: LD_INT 32
2898: PPUSH
2899: CALL_OW 111
// end ; end_of_file
2903: LD_VAR 0 1
2907: RET
// every 0 0$1 trigger IsDead ( Nefarem ) do
2908: LD_EXP 6
2912: PPUSH
2913: CALL_OW 301
2917: IFFALSE 2929
2919: GO 2921
2921: DISABLE
// begin YouLost ( ded2 ) ;
2922: LD_STRING ded2
2924: PPUSH
2925: CALL_OW 104
// end ;
2929: END
// every 0 0$1 trigger IsDead ( OWChyba ) do
2930: LD_EXP 5
2934: PPUSH
2935: CALL_OW 301
2939: IFFALSE 2951
2941: GO 2943
2943: DISABLE
// begin YouLost ( ded ) ;
2944: LD_STRING ded
2946: PPUSH
2947: CALL_OW 104
// end ;
2951: END
// on EnterBuilding ( b , un ) do begin if b = eon then
2952: LD_VAR 0 1
2956: PUSH
2957: LD_INT 14
2959: EQUAL
2960: IFFALSE 2984
// if GetSide ( un ) = 4 then
2962: LD_VAR 0 2
2966: PPUSH
2967: CALL_OW 255
2971: PUSH
2972: LD_INT 4
2974: EQUAL
2975: IFFALSE 2984
// begin YouLost ( eon ) ;
2977: LD_STRING eon
2979: PPUSH
2980: CALL_OW 104
// end ; end ;
2984: PPOPN 2
2986: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
2987: LD_VAR 0 1
2991: PUSH
2992: LD_INT 1
2994: EQUAL
2995: PUSH
2996: LD_VAR 0 2
3000: PUSH
3001: LD_INT 4
3003: EQUAL
3004: AND
3005: IFFALSE 3014
// begin YouLost ( fire ) ;
3007: LD_STRING fire
3009: PPUSH
3010: CALL_OW 104
// end ; end ; end_of_file
3014: PPOPN 2
3016: END
// export Center ; every 0 0$1 trigger Center = 1 do
3017: LD_EXP 48
3021: PUSH
3022: LD_INT 1
3024: EQUAL
3025: IFFALSE 3049
3027: GO 3029
3029: DISABLE
// begin ; CenterNowOnUnits ( OWChyba ) ;
3030: LD_EXP 5
3034: PPUSH
3035: CALL_OW 87
// CenterNowOnUnits ( f1 ) ;
3039: LD_EXP 39
3043: PPUSH
3044: CALL_OW 87
// enable ;
3048: ENABLE
// end ;
3049: END
